home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World Komputer 1998 July & August
/
Pcwk78a98.iso
/
Sharewar
/
Organise
/
_SETUP.1
/
Epoch Organiser 3.0.exe
/
0
/
RCDATA
/
TCONVERTFORM
/
TCONVERTFORM.txt
Wrap
Text File
|
1998-01-25
|
21KB
|
795 lines
object ConvertForm: TConvertForm
Left = 170
Top = 40
BorderStyle = bsDialog
Caption = 'Conversion Charts'
ClientHeight = 396
ClientWidth = 284
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OnClose = FormClose
OnCreate = FormCreate
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 284
EdgeBorders = [ebTop, ebBottom]
TabOrder = 0
object Convertbtn: TBitBtn
Left = 0
Top = 2
Width = 67
Height = 22
Caption = 'Convert'
TabOrder = 0
OnClick = ConvertbtnClick
Glyph.Data = {
76010000424D7601000000000000760000002800000020000000100000000100
04000000000000010000120B0000120B00001000000000000000000000000000
800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00337333733373
3373337F3F7F3F7F3F7F33737373737373733F7F7F7F7F7F7F7F770000000000
000077777777777777773303333333333333337FFF333333333F370993333333
3399377773F33333337733033933333339333F7FF7FFFFFFF7FF77077797CCC7
977777777777777777773303339C333C9333337F3377F3377F33370333C93339
C333377F33773FF77F33330333C39993C3333F7FFF7F777F7FFF770777C77777
C77777777777777777773303333C333C3333337F33373FF7333337033333CCC3
3333377F33337773333333033333333333333F7FFFFFFFFFFFFF770777777777
7777777777777777777733333333333333333333333333333333}
NumGlyphs = 2
end
object Panel1: TPanel
Left = 67
Top = 2
Width = 128
Height = 22
BevelOuter = bvNone
Ctl3D = False
ParentCtl3D = False
TabOrder = 1
object Label35: TLabel
Left = 59
Top = 0
Width = 11
Height = 20
Caption = '&&'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
end
object ImpEdit: TEdit
Left = 1
Top = 0
Width = 50
Height = 21
Ctl3D = True
ParentCtl3D = False
ParentShowHint = False
ShowHint = True
TabOrder = 0
end
object MetEdit: TEdit
Left = 76
Top = 0
Width = 50
Height = 21
Ctl3D = True
ParentCtl3D = False
ParentShowHint = False
ShowHint = True
TabOrder = 1
end
end
object BitBtn1: TBitBtn
Left = 195
Top = 2
Width = 58
Height = 22
TabOrder = 2
Kind = bkClose
end
object Panel2: TPanel
Left = 253
Top = 2
Width = 4
Height = 22
BevelOuter = bvNone
Ctl3D = False
ParentCtl3D = False
TabOrder = 3
end
object BitBtn2: TBitBtn
Left = 257
Top = 2
Width = 26
Height = 22
TabOrder = 4
OnClick = BitBtn2Click
Glyph.Data = {
DE010000424DDE01000000000000760000002800000024000000120000000100
0400000000006801000000000000000000001000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333336633
3333333333333FF3333333330000333333364463333333333333388F33333333
00003333333E66433333333333338F38F3333333000033333333E66333333333
33338FF8F3333333000033333333333333333333333338833333333300003333
3333446333333333333333FF3333333300003333333666433333333333333888
F333333300003333333E66433333333333338F38F333333300003333333E6664
3333333333338F38F3333333000033333333E6664333333333338F338F333333
0000333333333E6664333333333338F338F3333300003333344333E666433333
333F338F338F3333000033336664333E664333333388F338F338F33300003333
E66644466643333338F38FFF8338F333000033333E6666666663333338F33888
3338F3330000333333EE666666333333338FF33333383333000033333333EEEE
E333333333388FFFFF8333330000333333333333333333333333388888333333
0000}
NumGlyphs = 2
end
end
object PageControl1: TPageControl
Left = 2
Top = 36
Width = 280
Height = 359
ActivePage = TabSheet2
TabOrder = 1
object TabSheet1: TTabSheet
Caption = 'Temperature'
object Label34: TLabel
Left = 2
Top = 152
Width = 270
Height = 13
Caption =
'37 ------------------------------98.6--- Normal Body Temperature' +
' --'
end
object Label1: TLabel
Left = 15
Top = 312
Width = 15
Height = 13
Alignment = taRightJustify
Caption = '-40'
end
object Label2: TLabel
Left = 15
Top = 291
Width = 15
Height = 13
Alignment = taRightJustify
Caption = '-30'
end
object Label3: TLabel
Left = 15
Top = 271
Width = 15
Height = 13
Alignment = taRightJustify
Caption = '-20'
end
object Label4: TLabel
Left = 15
Top = 250
Width = 15
Height = 13
Alignment = taRightJustify
Caption = '-10'
end
object Label5: TLabel
Left = 24
Top = 229
Width = 6
Height = 13
Alignment = taRightJustify
Caption = '0'
end
object Label6: TLabel
Left = 18
Top = 208
Width = 12
Height = 13
Alignment = taRightJustify
Caption = '10'
end
object Label7: TLabel
Left = 18
Top = 188
Width = 12
Height = 13
Alignment = taRightJustify
Caption = '20'
end
object Label8: TLabel
Left = 18
Top = 167
Width = 12
Height = 13
Alignment = taRightJustify
Caption = '30'
end
object Label9: TLabel
Left = 18
Top = 146
Width = 12
Height = 13
Alignment = taRightJustify
Caption = '40'
end
object Label10: TLabel
Left = 18
Top = 126
Width = 12
Height = 13
Alignment = taRightJustify
Caption = '50'
end
object Label11: TLabel
Left = 18
Top = 105
Width = 12
Height = 13
Alignment = taRightJustify
Caption = '60'
end
object Label12: TLabel
Left = 18
Top = 84
Width = 12
Height = 13
Alignment = taRightJustify
Caption = '70'
end
object Label13: TLabel
Left = 18
Top = 63
Width = 12
Height = 13
Alignment = taRightJustify
Caption = '80'
end
object Label14: TLabel
Left = 18
Top = 43
Width = 12
Height = 13
Alignment = taRightJustify
Caption = '90'
end
object Label15: TLabel
Left = 12
Top = 22
Width = 18
Height = 13
Alignment = taRightJustify
Caption = '100'
end
object Label16: TLabel
Left = 78
Top = 22
Width = 190
Height = 13
Caption = '212 ------------------ Boiling --------------------------'
end
object Label17: TLabel
Left = 78
Top = 43
Width = 25
Height = 13
AutoSize = False
Caption = '194'
end
object Label18: TLabel
Left = 78
Top = 63
Width = 25
Height = 13
AutoSize = False
Caption = '176'
end
object Label19: TLabel
Left = 78
Top = 84
Width = 25
Height = 13
AutoSize = False
Caption = '158'
end
object Label20: TLabel
Left = 78
Top = 105
Width = 25
Height = 13
AutoSize = False
Caption = '140'
end
object Label21: TLabel
Left = 78
Top = 126
Width = 25
Height = 13
AutoSize = False
Caption = '122'
end
object Label22: TLabel
Left = 78
Top = 146
Width = 25
Height = 13
AutoSize = False
Caption = '104'
end
object Label23: TLabel
Left = 78
Top = 167
Width = 25
Height = 13
AutoSize = False
Caption = '86'
end
object Label24: TLabel
Left = 78
Top = 188
Width = 25
Height = 13
AutoSize = False
Caption = '68'
end
object Label25: TLabel
Left = 78
Top = 208
Width = 25
Height = 13
AutoSize = False
Caption = '50'
end
object Label26: TLabel
Left = 78
Top = 229
Width = 193
Height = 13
Caption = '32 --------------------- Freezing -----------------------'
end
object Label27: TLabel
Left = 78
Top = 250
Width = 25
Height = 13
AutoSize = False
Caption = '14'
end
object Label28: TLabel
Left = 78
Top = 271
Width = 25
Height = 13
AutoSize = False
Caption = '-4'
end
object Label29: TLabel
Left = 78
Top = 291
Width = 25
Height = 13
AutoSize = False
Caption = '-22'
end
object Label30: TLabel
Left = 78
Top = 312
Width = 25
Height = 13
AutoSize = False
Caption = '-40'
end
object Label31: TLabel
Left = 3
Top = 2
Width = 93
Height = 13
Caption = 'Celcius to Farenheit'
end
object Label32: TLabel
Left = 176
Top = 286
Width = 34
Height = 13
Caption = 'Celcius'
end
object Label33: TLabel
Left = 166
Top = 311
Width = 44
Height = 13
Caption = 'Farenheit'
end
object CentTrack: TTrackBar
Left = 32
Top = 15
Width = 45
Height = 317
Max = 100
Min = -40
Orientation = trVertical
Frequency = 2
Position = 100
SelEnd = 0
SelStart = 0
TabOrder = 0
TickMarks = tmBoth
TickStyle = tsAuto
OnChange = CentTrackChange
end
object CentPanel: TPanel
Left = 221
Top = 282
Width = 48
Height = 21
Alignment = taLeftJustify
BorderStyle = bsSingle
Color = clWhite
TabOrder = 1
end
object FarPanel: TPanel
Left = 221
Top = 308
Width = 48
Height = 21
Alignment = taLeftJustify
BorderStyle = bsSingle
Color = clWhite
TabOrder = 2
end
end
object TabSheet2: TTabSheet
Caption = 'Weights && Measures'
object Memo1: TMemo
Left = 0
Top = 0
Width = 272
Height = 331
Align = alClient
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Lines.Strings = (
'Length'
''
' 1 Millimeter'
' = 0.03937 inches'
''
' 1 Centimeter'
' = 0.3937 inches'
''
' 1 Decimeter'
' = 3.937 inches'
''
' 1 Meter'
' = 39.37 inches'
' = 3.28 feet'
' = 1.094 yards'
''
' 1 Dekameter'
' = 32.808 feet'
''
' 1 Kilometer'
' = 3280.8 feet = 0.621 miles'
''
' Area'
''
' 1 Square Millimeter'
' = 0.002 square inches'
''
' 1 Square Centimeter'
' = 0.155 square inches'
''
' 1 Square Decimeter'
' = 15.5 square inches'
''
' 1 Square Meter'
' = 10.764 square feet'
' = 1.196 square yards'
''
' 1 Are'
' = 119.599 square yards'
' = 0.025 acres'
''
' 1 Hectare'
' = 2.471 acres'
''
' 1 Square Kilometer'
' = 0.386 square miles'
' = 247.1 acres'
''
'Volume'
''
' 1 Milliliter'
' = 0.271 fluid drams'
''
' 1 Litre'
' = 1.057 liquid quarts'
' = 1.74 pints'
''
' 1 Decalitre'
' = 2.642 gallons'
''
' 1 Hecolitre'
' = 26.418 gallons'
''
'Weight'
''
' 1 Milligram'
' = 0.015 grains'
''
' 1 gram'
' = 15.432 grains'
' = 0.035 ounces'
''
' 1 Kilogram'
' = 25.274 ounces'
' = 2.205 pounds'
''
' 1 Metric Ton'
' = 1.102 short tons'
' = 2,204.623 pounds')
ParentFont = False
ReadOnly = True
ScrollBars = ssVertical
TabOrder = 0
end
end
object TabSheet3: TTabSheet
Caption = 'Gifts'
object Memo2: TMemo
Left = 0
Top = 0
Width = 272
Height = 331
Align = alClient
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Lines.Strings = (
'Month'
' Birthstones'
' Flowers'
''
'January'
' Garnet '
' Carnation, Snowdrop '
''
'February'
' Amethyst'
' Violet, Primrose'
''
'March'
' Bloodstone, Aquamarine'
' Jonquil, Daffodil'
''
'April'
' Diamond'
' Sweet Pea, Daisy'
''
'May'
' Emerald'
' Lily of the Valley, Hawthorn'
''
'June'
' Pearl, Moonstone, Alexandrite'
' Rose, Honeysuckle'
''
'July'
' Ruby'
' Larkspur, waterlilly'
''
'August'
' Sardonyx, Peridot'
' Poppy, Gladiolus'
''
'September'
' Saphire'
' Aster, Morning Glory'
''
'October'
' Opal, Tourmailine'
' Calendula, Cosmos'
''
'November'
' Topaz'
' Chrysanthemum'
''
'December'
' Turquoise, Zircon'
' Narcissus, Holly')
ParentFont = False
ReadOnly = True
ScrollBars = ssVertical
TabOrder = 0
end
end
object TabSheet4: TTabSheet
Caption = 'Anniversaries'
object Memo3: TMemo
Left = 0
Top = 0
Width = 272
Height = 331
Align = alClient
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Lines.Strings = (
'Anniversaries'
''
'1st'
' -- Paper (Clocks)'
''
'2nd'
' -- Cotton (China)'
''
'3rd'
' -- Leather (Crystal, Glass)'
''
'4th'
' -- Linen, Silk (Electrical)'
''
'5th'
' -- Wood (Silverware)'
''
'6th'
' -- Iron (Wood)'
''
'7th'
' -- Wool, Copper (Desk Sets, Pen-Pencil Sets)'
''
'8th'
' -- Bronze (linens, Laces)'
''
'9th'
' -- Pottery, China (Leather)'
''
'10th'
' -- Tin, Aluminium (Diamond, Jewelry)'
''
'11th'
' -- Steel (Fashion Jewelry)'
''
'12th'
' -- Silk (Pearls, Coloured Gems)'
''
'13th'
' -- Lace (Textiles)'
''
'14th'
' -- Foux Ivory (Gold Jewelry) '
''
'15th'
' -- Crystal (Watches)'
''
'20th'
' -- China (Platinum)'
''
'25th'
' -- Silver (Sterling Silver)'
''
'30th'
' -- Pearl (Diamond)'
''
'35th'
' -- Coral (Jade)'
''
'40th'
' -- Ruby (Ruby)'
''
'45th'
' -- Saphire'
''
'50th'
' -- Gold'
''
'55th'
' -- Emerald'
''
'60th'
' -- Diamond')
ParentFont = False
ReadOnly = True
ScrollBars = ssVertical
TabOrder = 0
end
end
end
object ConvertPop: TPopupMenu
AutoPopup = False
Left = 146
Top = 148
object InchesCentimeters1: TMenuItem
Caption = 'Inches && Centimeters'
OnClick = InchesCentimeters1Click
end
object FeetMeters1: TMenuItem
Tag = 1
Caption = 'Feet && Meters'
OnClick = InchesCentimeters1Click
end
object YardsMeters1: TMenuItem
Tag = 2
Caption = 'Yards && Meters'
OnClick = InchesCentimeters1Click
end
object MilesKilometers1: TMenuItem
Tag = 3
Caption = 'Miles && Kilometers'
OnClick = InchesCentimeters1Click
end
object N1: TMenuItem
Caption = '-'
end
object SquareInchesCentimeters1: TMenuItem
Tag = 4
Caption = 'Square Inches && Centimeters'
OnClick = InchesCentimeters1Click
end
object SquareFeetDecimeters1: TMenuItem
Tag = 5
Caption = 'Square Feet && Decimeters'
OnClick = InchesCentimeters1Click
end
object SquareYardsMeters1: TMenuItem
Tag = 6
Caption = 'Square Yards && Meters'
OnClick = InchesCentimeters1Click
end
object SquareMilesKilometers1: TMenuItem
Tag = 7
Caption = 'Square Miles && Kilometers'
OnClick = InchesCentimeters1Click
end
object N2: TMenuItem
Caption = '-'
end
object PintsLitres1: TMenuItem
Tag = 8
Caption = 'Pints && Litres'
OnClick = InchesCentimeters1Click
end
object GallonsLitres1: TMenuItem
Tag = 9
Caption = 'Gallons && Litres'
OnClick = InchesCentimeters1Click
end
object N3: TMenuItem
Caption = '-'
end
object OuncesGrams1: TMenuItem
Tag = 10
Caption = 'Ounces && Grams'
OnClick = InchesCentimeters1Click
end
object PoundsGrams1: TMenuItem
Tag = 11
Caption = 'Pounds && Grams'
OnClick = InchesCentimeters1Click
end
object TonsTonnes1: TMenuItem
Tag = 12
Caption = 'Tons && Tonnes'
OnClick = InchesCentimeters1Click
end
end
end